library(ggplot2)
library(foreign)
# Female
# Read in data
d <- read.dta("5 Results/res_contrib_socdem.dta")
d$group <- rownames(d)
d$model <- "Socio-Demographics"
d$model_id <- "1"
